##################
# Angel M. Villegas-Cruz
# This file replicates Table 2 in the main manuscript.
# 08/18/2024
##################

library(xtable) 
library(readxl)

#upload data
Table_2 <- read_excel("Table 2.xlsx") #upload data

#Table 2: Top 20 terms associated with each dependent variable ordered by Fightin’ Words statistic (Monroe, et al. 2008)
xtable(Table_2) # print latex
